# $Id: Mammal.pm 124 2008-01-07 11:29:21Z asksol $
# $Source$
# $Author: asksol $
# $HeadURL: http://class-dot.googlecode.com/svn/trunk/t/010-std_1.x_tests/Mammal.pm $
# $Revision: 124 $
# $Date: 2008-01-07 11:29:21 +0000 (Mon, 07 Jan 2008) $
package Mammal;

use strict;
use warnings;

use Class::Dot qw( -new property isa_Data isa_Hash );

property brain  => isa_Hash;
property dna    => isa_Data;

1;

# Local Variables:
#   mode: cperl
#   cperl-indent-level: 4
#   fill-column: 78
# End:
# vim: expandtab tabstop=4 shiftwidth=4 shiftround
